home *** CD-ROM | disk | FTP | other *** search
/ PC Home 48 / Fun Clicp Art 5000.iso / r / mbm8 / 00866_PH-OU 1.ls < prev    next >
Encoding:
Text File  |  1996-06-10  |  334 b   |  14 lines
  1. on enterFrame
  2.   global gMaxBoutons, g1erSprLoc, g1erSprChr, gScopePh, gLabel, gBoutons, gBarChron
  3.   curseur(6)
  4.   gBarChron(fleche, 0, 1, 2)
  5.   gScopePh(SetCadence, 0)
  6.   gScopePh(visible, 0)
  7.   if gLabel <> "PH:IN fi" then
  8.     gScopePh(unLoad)
  9.   end if
  10.   repeat with i = g1erSprChr to gMaxBoutons
  11.     puppetSprite(i, 0)
  12.   end repeat
  13. end
  14.